﻿#Region "Copyright"
'————————————————————————————————————————
'	创建人员(Creator)    ：Huangyd
'	创建日期(Date)       ：2013-03-20
'   联系方式(Email)      ：aj-ayumi@163.com; gajayumi@gmail.com; ajayumi@me.com
'   描    述(Description)：
'
'	Copyright (C) 2010-2012 ajayumi 版权所有
'————————————————————————————————————————
#End Region
Imports System.ComponentModel

Namespace Net

    ''' <summary>
    ''' 异步获取网页源码完成事件
    ''' </summary>
    ''' <remarks></remarks>
    Public Class GetWebDocumentCompletedEventArgs
        Inherits AsyncCompletedEventArgs

        Private m_WebDocumentInfo As WebDocumentInfo = Nothing
        ''' <summary>
        ''' 网络文档实体
        ''' </summary>
        Public ReadOnly Property [WebDocumentInfo] As WebDocumentInfo
            Get
                Return m_WebDocumentInfo
            End Get
        End Property

        Public Sub New(ByVal [error] As Exception, ByVal cancelled As Boolean, ByVal userState As Object)
            MyBase.New([error], cancelled, userState)
        End Sub

        Public Sub New(ByVal [error] As Exception, ByVal cancelled As Boolean, ByVal userState As Object, ByVal webDocInfo As WebDocumentInfo)
            MyBase.New([error], cancelled, userState)
            Me.m_WebDocumentInfo = webDocInfo
        End Sub

    End Class


End Namespace